home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48hor2 / rpl48.doc < prev    next >
Text File  |  1995-03-31  |  69KB  |  1,706 lines
  1.  
  2.  
  3.                        #####  #####  #       #   ### 
  4.                         #   #  #   # #      ##  #   # 
  5.                         #   #  #   # #     # #  #   # 
  6.                         ####   ####  #    #  #   ### 
  7.                         # #    #     #    ##### #   # 
  8.                         #  #   #     #       #  #   # 
  9.                         #   #  #     ####    #   ### 
  10.  
  11.  
  12.  
  13.  
  14.                A SYSTEM-RPL DEVELOPMENT TOOLKIT FOR THE HP48SX 
  15.  
  16.  
  17.  
  18.                               Version 1.12 beta 
  19.  
  20.  
  21.                (c) 1993 by Detlef Mueller & Raymond Hellstern 
  22.  
  23.  
  24. CONTENTS 
  25. ======== 
  26.  
  27.  
  28. 1. Introduction 
  29.     1.1 Copyrights & Acknoledgements 
  30.     1.2 The RPL48 Toolkit 
  31.     1.3 Requirements & Installation Instructions 
  32.     1.4 Abbreviations 
  33.  
  34. 2. <-RPL-> Library 
  35.     2.1 Overview 
  36.     2.2 The System-RPL Compiler/Decompiler 
  37.     2.3 The Saturn Assembler/Disassembler 
  38.         2.3.1 The Assembler Parameter Field Parser 
  39.     2.4 The Reference Table 
  40.     2.5 Command Reference 
  41.     2.6 Hooks 
  42.     2.7 Things to Notice 
  43.  
  44. 3. <-LIB-> Library 
  45.     3.1 Overview 
  46.     3.2 Control Variables 
  47.     3.3 Command Reference 
  48.     3.4 Things to Notice 
  49.  
  50. Appendix A - Quick Reference Guides 
  51.     A.1 <-RPL-> 
  52.         A.1.1 Commands 
  53.         A.1.2 Flag Usage 
  54.         A.1.3 Error Messages 
  55.     A.2 <-LIB-> 
  56.         A.2.1 Commands 
  57.         A.2.2 Flag Usage 
  58.         A.2.3 Error Messages 
  59.  
  60. Appendix B - A ->COD Example 
  61.  
  62. Appendix C - Ordering Information 
  63.  
  64.  
  65. 1. Introduction 
  66. =============== 
  67.  
  68.  
  69. 1.1 Copyrights & Acknowledgements 
  70. --------------------------------- 
  71.  
  72. All files of the RPL48 toolkit are copyrighted (c) by Detlef Mueller and 
  73. Raymond Hellstern, 1991-1993 - unless otherwise noted. 
  74.  
  75. The RPL48 package is distributed in the hope that it will be useful, but 
  76. RPL48 is provided 'as is,' and is subject to change without notice. 
  77. D. Mueller and R. Hellstern makes no warranty of any kind with regard to 
  78. the software or documentation, including, but not limited to, the implied 
  79. warranties of merchantability and fitness for a particular purpose. 
  80. D.Mueller and R.Hellstern shall not be liable for any error or for incidental 
  81. or consequential damages in connection with the furnishing, performance, or 
  82. use of this software and documentation. 
  83.  
  84. Please excuse all the linguistic errors in this text. English is not our 
  85. native language. 
  86.  
  87. This version of RPL48 is a GiftWare release - you may use it as long as you 
  88. like - without registration for developing non-commercial software only. 
  89. Permission to copy the whole, unmodified RPL48 package is granted provided 
  90. that the copies are not made or distributed for resale (excepting nominal 
  91. copying fees). If you want to get your own, brand new version and for further 
  92. information please refer to Appendix C. 
  93.  
  94. It should be impossible to crash your HP48 by using RPL48, but no software is 
  95. bug free and the <-RPL->:4.1 library (serial no. 113) is still a beta release. 
  96.  
  97. We would like to thank the following persons for their support: 
  98.  
  99.     Wlodek Mier-Jedrzejowicz for presenting RPL48 to the world. 
  100.     Rick Grevelle for the HACKIT library, the ->DIR command in the <-LIB-> 
  101.       library, the base of the sys-stack, many suggestions and exiting talks. 
  102.     Mika Heiskanen for beta testing, lots of suggestions, MKROM and DEBUG. 
  103.     Joseph K. Horn for beta testing and suggestions, the `HP 48 Resource 
  104.       Allocation Guideline; Library ID's`, SORTLS and for maintaining the 
  105.       HP48 Goodies Disks. 
  106.     Carlos Ferraro for beta testing. 
  107.     Simone Rapisarda for beta testing and many suggestions. 
  108.     Fatri Mohamed, Romain Desplats, Georg Hoppen for suggestions and beta 
  109.       testing. 
  110.     James H. Cloos, Steve VanDevender, Chris Maksymiak for suggestions. 
  111.     Chris Spell for maintaining the HP48 archive at seq.uncwil.edu and for 
  112.       moderating comp.sources.hp48. 
  113.     W.C.Wickes & HP Corvallis for the HP48 and the RPL tools. 
  114.     D. York for the friendly permission to publish the BNF parser generator 
  115.       example. 
  116.  
  117.  
  118. 1.2 The RPL48 Toolkit 
  119. --------------------- 
  120.  
  121. The RPL48 Toolkit provides more than 50 powerful commands to aid program and 
  122. library development on a HP48 using system RPL and assembler. It consists of 
  123. three parts: 
  124.     - Library 1234, <-RPL->:4.1 - Contains a sys-RPL compiler/decompiler and 
  125.       Saturn assembler/disassembler. 
  126.     - Library 1221, <-LIB->:1.7 - Contains a library maker/splitter and many 
  127.       commands for handling libraries and un-/supported objects. 
  128.     - a reference table which contains addresse/name pairs of ROM entry points. 
  129.  
  130. The main commands of RPL48 are modelled after the MS-DOS programs RPLCOMP.EXE, 
  131. SASM.EXE and USRLIB.EXE which are provided by HP in the self extracting 
  132. archive TOOLS.EXE (available on several ftp sites). This document describes 
  133. the interface to RPL48; it is not a sys-RPL or Saturn assembler manual. Please 
  134. refer to RPLMAN.DOC, RPLCOMP.DOC, USRLIB.DOC and SASM.DOC (all contained in 
  135. TOOLS.EXE) for learning and/or reference purposes.  [Note: RPLMAN.DOC etc can 
  136. be found on Goodies Disk #4.  -jkh-] 
  137.  
  138. We assume that you are familar with sys-RPL, Saturn assembler and libraries. 
  139.  
  140.  
  141. 1.3 Requirements & Installation Instructions 
  142. -------------------------------------------- 
  143.  
  144. RPL48 runs on ROM version A-E HP48SX; it may run on ROM version J, but it is 
  145. not tested yet ! 
  146.  
  147. The <-RPL-> library it compiled to a fixed address; it MUST be stored in an 
  148. independent (FREEd) port (1 or 2) - thus it only works on a HP48SX. Because 
  149. the whole RPL48 kit requires ~60kb of memory (including a reference table made 
  150. from the latest entries released by HP) it is recommended to store it into a 
  151. 128k RAM card. The <-LIB-> library is developpt using the standard methods, 
  152. it can be stored and used in port 0 on a HP48S. 
  153.  
  154. For a complete installation of RPL48 it is neccessary that you have plugged in 
  155. a 128k RAM card (which must have ~60kb free space) in either port 1 or 2 of 
  156. your HP48SX; the card must be set to R/W. Proceed as follows: 
  157.     - remove any old versions 
  158.     - merge the port 
  159.     - download RPL.TAB, LIB.LIB and RPL.LIB 
  160.     - recall RPL.TAB to the stack, purge RPL.TAB and store it as a backup 
  161.       object named RPL.TAB (case sensitive !) into port 0 (:0:RPL.TAB STO) 
  162.     - recall the two libraries, purge the variables containing the original 
  163.       copies and store the libraries into port 0 (two times 0 STO) 
  164.     - free the port, make sure that :0:1234 is the 1st entry of the list in 
  165.       level 2 for the FREE command ! (you can use 0 PVARS DROP to generate the 
  166.       base list) 
  167.     - power cycle your HP48SX or press [ON]-[C] 
  168.  
  169. As mentioned, <-RPL-> is compiled to an absolute address. Its config code 
  170. takes care of the address the library is stored at. If neccessary, the base 
  171. addresses of the ports are swapped and an additional warmstart is initiated 
  172. automatically while executing the first warmstart after installation. If the 
  173. config code recognizes that it is impossible to change to the correct address 
  174. (ie. the library is stored in port 0 or not the 1st object of port 1 or 2), 
  175. the autoattach to the home directory is supressed and no (c)-message and no 
  176. beep is generated. If the library did not attach itself, make sure it becomes 
  177. the 1st object of port 1 or 2 and execute a warmstart again. 
  178.  
  179. If you have installed a HP41 emulator card, <-RPL-> does not install because 
  180. the emulator uses a similar scheme to install itself to the same address (it 
  181. is also an absolute library) -- just remove the card. 
  182.  
  183. The <-RPL-> and the <-LIB-> libraries are not self-modifing - you can write 
  184. protect the card containing the libraries. 
  185.  
  186.  
  187. 1.4 Abbreviations 
  188. ----------------- 
  189.  
  190. LID   - library id; a number in the range 0..2047, part of any library, It is 
  191.         used by the HP firmware to identify libraries while resolving commands, 
  192.         messages et c. 
  193. |     - used in stack diagrams for 'or' 
  194.  
  195. Abbreviations denoting objects: 
  196.  
  197. ob      object of any type 
  198. xlib    named or unnamed library command 
  199. :x:y    tagged object - tag x, ob y 
  200. prg     program (secondary) 
  201. bak     backup 
  202. dir     directory 
  203. alg     algebraic 
  204. lib     library 
  205. libdta  library data 
  206. meta(t) meta object, obn .. ob1 %n, all ob's are of the same type t 
  207.  
  208. All other abbreviations are defined in RPLMAN.DOC (eg. %, #). 
  209.  
  210.  
  211. 2. <-RPL-> Library 
  212. ================== 
  213.  
  214.  
  215. 2.1 Overview 
  216. ------------ 
  217.  
  218. <-RPL-> contains 17 commands, including a sys-RPL compiler (->RPL), a sys-RPL 
  219. decompiler (RPL->), a Saturn assembler (->COD), a Saturn disassembler (COD->) 
  220. a RPL.TAB browser (EC) and a medium font sys-stack display (4/5/7). 
  221.  
  222.  
  223. 2.2 The System-RPL Compiler/Decompiler 
  224. -------------------------------------- 
  225.  
  226. The compiler is a simple token based one pass LR compiler and implements a 
  227. grammatical subset of RPLCOMP.EXE. It accepts string objects containing a 
  228. token sequence as input. Tokens must be seperated by whitespace (NL,CR,Space, 
  229. TAB etc.). 
  230.  
  231. The output of the decompiler can be used as input for the compiler or (with 
  232. minor modifications) as input for RPLCOMP.EXE. 
  233.  
  234. When ->RPL is compiling a string, it recognizes certain words and generates 
  235. appropriate code for them. All other words are assumed to be the labels of 
  236. objects in the runstream and are emitted simply as 5-nibble constants - the 
  237. reference table (see below) and the assembler symbol table are searched to 
  238. resolve the appropriate 5-nibble addresses. If an entry can't be found in one 
  239. of the tables and its 1st chararcter is a 'x', then ->RPL will try to resolve 
  240. the word without the leading 'x' as a built-in command (e.g. for 'xDROP' the 
  241. address #1FBD8 is generated). 
  242.  
  243. If the current token of ->RPL isn't resolvable as an object, entry or built 
  244. in, it is passed to the user-RPL compiler palparse. If the result is an ID or 
  245. prg, an error will be generated. If the token is parsed to a %, it will be 
  246. converted to a # (eg. "12345" ->RPL --> <3039h> (negative values are mapped 
  247. to 0 and fractional parts are ignored)); any other valid object is simply 
  248. added to the runstream (eg. [[1,2][3,4]] (F(.)) inserts a 2*2 array of reals). 
  249.  
  250. The following words are recognized by ->RPL or generated by RPL->: 
  251.  
  252. LAM <id> 
  253.     DOLAM object whose name is specified by <id>. (1) 
  254.  
  255. ID <id> 
  256.     DOIDNT object whose name is specified by <id>. 0-ID isn't supported by 
  257.     ->RPL. (1) 
  258.  
  259. TAG <id> <ob> 
  260.     DOTAG object whose tag is specified by <id> and whose object is given 
  261.     by <ob>. 
  262.  
  263. $ "string" 
  264.     DOCSTR object with the contents contained between the quotes. (1) 
  265.  
  266. CHR <char> 
  267.     DOCHAR object with the specified character. (1) 
  268.  
  269. # <hex no> 
  270. #<hex no> 
  271.     DOBINT object whose body is the number specified in hex. (3) 
  272.  
  273. % <real no> 
  274.     DOREAL object with the specified floating-point number. 
  275.  
  276. %% <extended real no> 
  277.     DOEREL object with the specified floating-point number. The number is 
  278.     parsed with % resolution. 
  279.  
  280. C% <real no> <real no> 
  281.     DOCMP object with the specified floating-point numbers. 
  282.  
  283. C%% <extended real no> <extended real no> 
  284.     DOECMP object with the specified floating-point numbers. The numbers are 
  285.     parsed with % resolution. 
  286.  
  287. PTR <hex #> 
  288.     Forces the <hex #> to be entered as a runstream pointer-obj. 
  289.  
  290. ROMPTR <hex #> <hex #> 
  291.     DOROMP object with the two 3-digit (maximum) hex numbers. 
  292.  
  293. HXS <length in hex> <string> 
  294. GROB <length in hex> <string> 
  295. CODE <length in hex> <string>           (2) 
  296. ARRY <length in hex> <string>           (2) 
  297. LNKARRY <length in hex> <string>        (2) 
  298. LIBRARY <length in hex> <string>        (2) 
  299. BACKUP <length in hex> <string>         (2) 
  300. LIBDAT <length in hex> <string>         (2) 
  301. EXT1 <length in hex> <string>           (2) 
  302. EXT2 <length in hex> <string>           (2) 
  303. EXT3 <length in hex> <string>           (2) 
  304. EXT4 <length in hex> <string>           (2) 
  305.     Specified object whose body is made from the hex-string. 0-ob's aren't 
  306.     supported by ->RPL. 
  307.  
  308. NIBB <length in hex> <string>           (2) 
  309.     Adds the binary form of <string> to the runstream, eg. NIBB 7 84E2000 
  310.     creates a 0-ID. 
  311.  
  312. CODE <assembler source ..> ENDCODE 
  313.     CODE object, the assembler is called to assemble the body. 
  314.  
  315. ASSEMBLE <assembler source ..> RPL 
  316.     The assembler is used to create the inline code. 
  317.  
  318. INCLUDE <name> 
  319.     The accessable path is searched for a variable with the name <name>. Its 
  320.     contens must be a compilable string and may contain further INCLUDE 
  321.     statements. The resulting code is inserted at the position of the INCLUDE 
  322.     statement. 
  323.  
  324. INCLOB <name>                           (2) 
  325.     The accessable path is searched for a variable with the name <name>. Its 
  326.     recalled contens is inserted at the position of the INCLOB statement. 
  327.  
  328.  
  329. The following words defines runstream pointer-objects: 
  330.  
  331. UNIT    DOEXT  - Unit start 
  332. SYMBOL  02AB8  - Symbolic start 
  333. ::      DOCOL  - Program start 
  334. {       DOLIST - List start 
  335. }       SEMI   - List terminator 
  336. ;       SEMI   - Program, UNIT or SYMBOL terminator 
  337.  
  338.  
  339. Text surrounded by ' (' and ') ' is ignored by ->RPL. 
  340.  
  341.  
  342. Before you start compiling own objects, play with the decompiler to get some 
  343. examples of the syntax definitions, eg. try { + } 1 GET RPL-> to see what '+' 
  344. does. 
  345.  
  346.  
  347. Note (1) 
  348.     Character substitution is supported via '\xxx' in strings, IDs, LAMs and 
  349.     CHRs using the internal routine which does the tranlsation for TRANSIO, 
  350.     code 3 (see the HP48 manual for a comlete description). You must use 
  351.     '\034' to insert doublequotes (") into strings. 
  352.     RPL-> generates (") within strings, not \034. 
  353.  
  354. Note (2) 
  355.     These statements are not compatible to RPLCOMP.EXE. 
  356.  
  357. Note (3) 
  358.     ->RPL accepts BINTS in one of the following form: 
  359.         # xxx - allways compiled to BINT objects 
  360.         #xxx  - searches the ROM for a BINT with the appropriate value, if 
  361.                 found a pointer to is generated instead of a BINT object 
  362.         xxx   - real numbers are COERCED and then handled like #xxx 
  363.  
  364.  
  365. 2.3 The Saturn Assembler/Disassembler 
  366. ------------------------------------- 
  367.  
  368. The assembler defines a subset of SASM.EXE written by Nathan Zelle. You can 
  369. use it 'stand-alone' or in conjunction with the RPL compiler ->RPL. It's a 
  370. 2-pass assembler. 
  371.  
  372. The input string should be plain ASCII (with blanks and/or TAB's) generated on 
  373. a PC or the HP48 itself. 
  374.  
  375. It is 'free format' which means that no coloumn counting is required, except 
  376. that labels MUST begin in the first coloumn of a line. 
  377.  
  378. If a line only consists of a comment, in coloumn 1 MUST be a '*'. Empty lines 
  379. are skipped. 
  380.  
  381. The general line structure is: "<Label> [<Mnemonic> <Modifier> <Comment>]" or 
  382. "* Comment"; the fields are seperated by blanks or TABs. 
  383.  
  384. Most parameters can be symbolic (eg. " GOVLNG (=SAVPTR)+45*3" is valid). 
  385.  
  386. The assembler supports 'conditional assembly' as well as defining equates via 
  387. "Label  EQU  expression". Please refer to SASM.DOC for more details. 
  388.  
  389. You can call 'global' entry points, if a reference table is installed. 
  390.  
  391. A predefined standard macro named LOOP is also included. If entered as 
  392. mnemonic (without parameter) it will be assembled to " GOVLNG  =Loop", an 
  393. address which simply does 
  394.  
  395. =Loop A=DAT0  A 
  396.       D0=D0+  5 
  397.       PC=(A) 
  398.  
  399. If the assembler source don't contain any code, the 2nd pass is skiped to 
  400. speed up RPL define like constructs - eg. a directory may hold along with 
  401. the source strings a variable HEADER: 
  402.  
  403. (HEADER) 
  404. ASSEMBLE 
  405. @a EQU =1GETLAM 
  406. !a EQU =1PUTLAM 
  407. @b EQU =2GETLAM 
  408. !b EQU =2GETLAM 
  409. nr EQU =TWO 
  410. RPL 
  411.  
  412. which may be included by a source like: 
  413.  
  414. (xyz) 
  415. INCLUDE HEADER 
  416. :: 
  417.   CKN 
  418.   DUP nr #<> case SETSIZEERR 
  419.  
  420.   ' NULLLAM nr NDUPN {}N BIND 
  421.  
  422.   @a @b 2DUP EQUAL ?SWAP 
  423.   !b !a 
  424.         (...etc...) 
  425.   ABND 
  426. ; 
  427.  
  428.  
  429. 2.3.1 The Assembler Parameter Field Parser 
  430. ------------------------------------------ 
  431.  
  432. Parameter fields are parsed by an expresion parser that is defined as follows: 
  433.  
  434.     expr : expr op1 term | term 
  435.     term : term op2 fact | fact 
  436.     fact : '(' expr ')' | op3 fact | '(' '=' entry ')' | '(' symbol ')' | num 
  437.  
  438.     op1  : '+' | '-' | '!' | '|' | '^' 
  439.     op2  : '*' | '/' | ':' 
  440.     op3  : '-' | '"' 
  441.  
  442.     num  : real-number | '#' hxs-number 
  443.  
  444.     entry  : label of RPL.TAB 
  445.     symbol : label of the assembler symbol table 
  446.  
  447.     op  action 
  448.     --  ------ 
  449.     *   multiply 
  450.     /   divide 
  451.     :   modulo 
  452.     "   ones complement 
  453.     -   subtract / twos complement 
  454.     +   add 
  455.     !   bit AND 
  456.     |   bit OR 
  457.     ^   bit XOR 
  458.  
  459. A complete expr must not contain whitespace chars. If an expression consists 
  460. only of a '#' number, an entry or a symbol, the parenteses aren't neccessary 
  461. (eg. @n EQU =1GETLAM ). Real numbers are converted internally to HXS numbers, 
  462. the accuracy is 64 bit. Parsing real numbers and hex numbers is done by the 
  463. '48 internal real/hex parser. The expr/term/fact parser are using the solver 
  464. token type table. 
  465.  
  466. Expressions of EQU parameter fields must resolve to the requested number 
  467. during the 1st assembler pass; they are ignored in the 2nd pass. 
  468.  
  469.  
  470. 2.4 The Reference Table 
  471. ----------------------- 
  472.  
  473. RPL->, ->RPL, COD->, ->COD, EC, E<->A and 4/5/7 are looking for a reference 
  474. table named RPL.TAB which will be used to resolve names and addresses of ROM 
  475. entry points. It may be stored in a variable, as a backup object in any port 
  476. or as a library command. If RPL.TAB exists, its recalled contens will be 
  477. evaluated and if the result is a string starting with '\000\010' it will be 
  478. used as a reference table. It is recommended to use the table shipped with 
  479. RPL48; it is made using the latest entries list released by HP as database - 
  480. double named entries are removed and a few user-RPL names are added to avoid 
  481. conflicts when decomling different '->', '>>', 'END' et c. 
  482.  
  483. For generating own tables use GENTAB.C, also shipped with RPL48. 
  484.  
  485. The following example (HP terminology) outlines the structure of a reference 
  486. table: 
  487.  
  488. ASSEMBLE 
  489.         CON(5)  =DOCSTR         String prologue 
  490.         REL(5)  TabEnd          Length field 
  491.         NIBASC  '\00\n'         Reference table identifier 
  492. *                               A hash table, for each char from ' '-DEL 
  493. *                               a 5-nib offset into the table 
  494.         CON(5)  0               ' ' entry, empty 
  495.         REL(5)  _!_             relativ offset to words starting with '!' 
  496.         CON(5)  0               '"' entry, empty 
  497. *       ...                     '#' - 'C' 
  498.         REL(5)  _D_             'D' entry 
  499. *       ...                     'E' - '}' 
  500.         CON(5)  0               '~' entry, empty 
  501.         CON(5)  TabEnd          DEL entry, always TabEnd 
  502.  
  503. _!_ 
  504.         CON(6)  #9623A0 
  505.         NIBASC  `!!append$` 
  506. *       ... 
  507. _D_ 
  508. *                +------- Lenght of the label in bytes. 
  509. *                |        A label can't be > 15 chars in size. 
  510. *                |+++++-- Address associated to the label, here 074E4 
  511. *                |||||| 
  512.         CON(6)  #6074E4         Address/length field of the following 
  513.         NIBASC  'DOBIND'        Label 
  514.  
  515. TabEnd 
  516. RPL 
  517.  
  518.  
  519. 2.5 Command Reference 
  520. --------------------- 
  521.  
  522. RPL->           ( ob                    --> $                           ) 
  523.     Decompiles an object into a string. The string can be used as input for 
  524.     ->RPL without modifications (most times). 
  525.  
  526.  
  527. ->RPL           ( $                     --> ob                          ) 
  528.     Compiles the input string into an object. 
  529.  
  530.  
  531. DCADR           ( hxs[adr]              --> $ hxs[adr]'                 ) 
  532.     Decompiles the object referenced by the address adr into a string in 
  533.     level 2 and increment the address by the object size. 
  534.  
  535.  
  536. COD->           ( code                  --> $                           ) 
  537.     Disassembles a code object, generates HP styled mnemonics. The reference 
  538.     table is searched for addresses of GO and Dx=(5) mnemonics. The string 
  539.     can be used as input for ->COD without modifications (most times). 
  540.  
  541.  
  542. ->COD           ( $                     --> code LibDat                 ) 
  543.     Assembles a code object. LibDat is the compressed form of a cross 
  544.     reference listing, use SYM-> (see below) for decompression. 
  545.  
  546.  
  547. ->OB            ( hxs[adr]              --> ob                          ) 
  548.                 ( #adr                  --> ob                          ) 
  549.                 ( XLIB                  --> ob                          ) 
  550.                 ( ob                    --> ob'                         ) 
  551.     Input       Action 
  552.     -----       ------ 
  553.     hxs         Build a pointer, pointing to the address given by the value 
  554.                 of hxs[adr]. 
  555.     #           Same as for hxs, except if the value of # points to a valid 
  556.                 ob in the hidden ROM; in this case the object is copied into 
  557.                 TEMPOB. Eg. "# 72000" ->RPL ->OB returns the message table 
  558.                 of the internal library 0. 
  559.     XLIB        Does a rompointer recall. 
  560.     ob          Unconditionally TOTEMPOB. 
  561.  
  562.  
  563. DAN             ( hxs[adr] %n           --> $1 .. $n hxs[adr]'          ) 
  564.     Disassembles n instructions starting at address hxs[adr]. 
  565.  
  566.  
  567. DA1             ( hxs[adr]              --> $ hxs[adr]'                 ) 
  568.     Disassembles the instruction at address hxs[adr]. 
  569.  
  570.  
  571. DAXY            ( hxs[start] hxs[end]   --> $                           ) 
  572.     Disassembles until the actual adr. is > hxs[end], starting at address 
  573.     hxs[start]. 
  574.  
  575.  
  576. SYM->           ( LibDat                --> $                           ) 
  577.     Converts the cross reference table produced by ->COD into a string. 
  578.  
  579.  
  580. $->             ( $                     --> ob                          ) 
  581.     Converts a hex-dump to an object. 
  582.  
  583.  
  584. ->$             ( ob                    --> $                           ) 
  585.     Generates a hex-dump of an object. 
  586.  
  587.  
  588. EC              (                       --> ?                           ) 
  589.     Entries Catalog - the reference table browser. Errors if no RPL.TAB 
  590.     can be found. 
  591.  
  592.     When starting EC the first time, it'll create the variable ECpar in 
  593.     the HOME directory. It contains a HXS that is used by EC as a lookup 
  594.     table into RPL.TAB; you may store the variable into a port (like 
  595.     RPL.TAB). Any time you install a new reference table it is neccessary 
  596.     to purge ECpar ! 
  597.  
  598.     Active keys in the main display of EC: 
  599.       UP    - move scroll bar up one word 
  600.       DOWN  - move scroll bar donw one word 
  601.       ENTER - push highlighted word as $ onto the stack. If EC is launched 
  602.               from a command/edit line, ENTER coppies the word into the 
  603.               editline starting at the current cursor position 
  604.       NXT   - scan for next occurence of the SCAN word. Doesn't scan the 
  605.               current page 
  606.       ON    - exit EC or cancel sub-action 
  607.       OFF   - turn off 
  608.  
  609.       Menu keys: 
  610.         PG|^  - page up 
  611.         PG|v  - page down 
  612.         SCAN  - prompts for a $ to search, ENTER starts searching. If 
  613.                 EC is launched from a command/edit line, the prompt looks 
  614.                 suspicious, but its functionality is the same 
  615.         A-Z   - try it 
  616.         ADR?  - displays the address of the current word. A 'r' behind the 
  617.                 address marks RPL entries. Words not marked are propably 
  618.                 for use within assembler only. If EC is launched from a 
  619.                 command/edit line, this function is disabled. 
  620.         A->ST - push the address of the current word onto the stack. If EC is # 
  621.                 launched from a command/edit line, this function is disabled. 
  622.  
  623.     For use of EC within a normal edit line, append the following program to 
  624.     your CST variable and launch EC with CST EC: 
  625.         :: TakeOver ROMPTR 4D2 C (EC) ; 
  626.  
  627.  
  628. E<->A           ( hxs[adr] | $name      --> $name | hxs[adr]            ) 
  629.     Searches the reference table for a name or address of a given address or 
  630.     name. 
  631.  
  632.  
  633. RPLtab          (                       --> $                           ) 
  634.     Tries to recall the ref. table via RPL.TAB. If no table is found, a 
  635.     zero-length string is returned. 
  636.  
  637.  
  638. 4/5/7           (                       -->                             ) 
  639.     Starts the medium font sys-stack display in five line mode. Pressing 
  640.     4/5/7 in five line mode switches to seven line mode, in seven line mode 
  641.     the sys-stack is canceled. 
  642.  
  643.     The following actions are redefined while the 5/7 stack is active: 
  644.       - pressing the up arrow without an active edit/commandline starts a 
  645.         5/7 level interactive sys-RPL stack 
  646.       - pressing the down arrow without an active edit/commandline starts 
  647.         editing the object of stack level one in sys-RPL syntax 
  648.  
  649.     If you have flag -29 set, the i-stack allows you to edit objects in 
  650.     sys-RPL syntax when pressing the EDIT menu key. 
  651.  
  652.         YOU MUST NOT MOVE THE <-RPL-> LIBRARY WHILE 4/5/7 IS ACTIVE !! 
  653.     (ie. DON'T MERGE THE PORT WHERE <-RPL-> IS STORED WITH AN ACTIVE 4/5/7 !!) 
  654.  
  655.     Clear flag -27 to quit 4/5/7 if you want to purge/move <-RPL->. 
  656.  
  657.  
  658. CC              (                       --> ?                           ) 
  659.     Character set Catalog. CC displays a map of 128 characters in the small 
  660.     font along with some more information for the highlighted char. You can 
  661.     move through the map with the cursor keys. If you hold down one of the 
  662.     cursor keys, it will repeat until you release. The ON-key exits the 
  663.     program, BLUE-ON turns the calc off and ENTER fetches the char number 
  664.     (tagged with the char) to the stack. 
  665.  
  666.     There are three menu keys available: 
  667.       SWAP - swaps between the upper/lower half of the char set 
  668.       BIN  - toggles the char code display from real/hex to binary and back 
  669.       EXIT - leaves CC 
  670.  
  671.     If you launch CC within an active editline (eg. via the CST menu), ENTER 
  672.     will copy the highlighted character into the editline to the current 
  673.     cursor position. For use of CC within a normal edit line, append the 
  674.     following program to your CST variable and launch CC with CST CC: 
  675.         :: TakeOver ROMPTR 4D2 10 (CC) ; 
  676.  
  677.  
  678. 2.7 Hooks 
  679. --------- 
  680.  
  681. There are a few user hooks in <-RPL->, each an unnamed ROMPTR. 
  682.  
  683. ROMPTR 4D2 13   (                       -->                             ) 
  684.     Switches to ADISP and displays a 5/7 level sys-RPL stack. 
  685.  
  686. ROMPTR 4D2 14   (                       -->                             ) 
  687.     Errors if <-RPL-> isn't ATTACHed to the HOME directory. 
  688.  
  689. ROMPTR 4D2 15   ( ob                    --> $                           ) 
  690.     Decompiles an object in quiet mode, eg. for editing. 
  691.  
  692. ROMPTR 4D2 16   ( $                     -->                             ) 
  693.     Compiles a string in quiet mode, eg. after editing. 
  694.  
  695.  
  696. 2.7 Things to Notice 
  697. -------------------- 
  698.  
  699. ->RPL maintains a global assembler symbol table while compiling an object, ie. 
  700. it is possible to jump backward from a code object to a previous one: 
  701.  
  702. :: 
  703.   CODE 
  704. Lp LOOP 
  705.   ENDCODE 
  706.   CODE 
  707.    GOTO lp 
  708.   ENDCODE 
  709. ; 
  710.  
  711. ->RPL tries to resolve a token in the following order: 
  712.     1. check for atomic object (eg. %, # et c.) 
  713.     2. search reference table 
  714.     3. search symbol table 
  715.     4. check for #<hex-no> 
  716.     5. check for user-RPL word 
  717.     6. check for user-RPL object 
  718.  
  719. The search of the symbol table enables the programmer to use DEFINE like 
  720. constructs: 
  721.  
  722. :: 
  723.   ASSEMBLE 
  724. @val EQU =1GETLAM 
  725. !val EQU =1PUTLAM 
  726.   RPL 
  727.  
  728.   ONE 1LAMBIND 
  729.   @val #1+ !val 
  730.   1GETABND 
  731. ; 
  732.  
  733.  
  734. 3. <-LIB-> 
  735. ========== 
  736.  
  737.  
  738. 3.1 Overview 
  739. ------------ 
  740.  
  741. <-LIB-> contains 39 commands, including a library maker (D->LIB), a library 
  742. splitter (L->DIR), commands to handle any sort of composite objects and 
  743. commands to manage libraries. 
  744.  
  745. Libraries are very usefull objects to extend the command set of a HP48 in 
  746. a 'native' manner, but unfortunately library creation is not supported by 
  747. the HP48 firmware. The HP tools package contains the program USRLIB.EXE, 
  748. which provides library creation on a PC; if you want to put your most often 
  749. programs into a library (because of easier handling and to keep your VARs 
  750. area clean), you have to collect them into a subdirectory, add a few control 
  751. variables, transfer the directory in binary form to a PC, run USRLIB.EXE on 
  752. it and transfer the created library back to your HP48, where you can install 
  753. and test the library. 
  754.  
  755. <-LIB-> provides the command D->LIB that works on the currently active 
  756. directory, allowing you to create a library from a directory on the HP48 
  757. itself - no transfers, no PC and no USRLIB.EXE are required. 
  758.  
  759. The input directory stucture of D->LIB is modeled very similar to the 
  760. directory structure required by USRLIB.EXE, thus existing USRLIB.EXE input 
  761. can be used for a library creation with minor changes (the difference is 
  762. the format of the $MESSAGE control variable, see below). 
  763.  
  764.  
  765. 3.2 Control Variables 
  766. --------------------- 
  767.  
  768. The library creation process is controlled by some variables with reserved 
  769. names and only the current directory is searched for its presence (note: 
  770. multiple occurences of these names are ignored, but only the contens of the 
  771. 1st one found in the current directory is used for the library creation 
  772. process): 
  773.  
  774. $ROMID 
  775.     Must contain a real or binary number representing the LID that is to 
  776.     be given to the library. The LID must be in the range 0..2047. Negative 
  777.     real numbers are mapped to 0. 
  778.     This is the only control variable that MUST exist in the current 
  779.     directory ! 
  780.  
  781. $TITLE 
  782.     Should contain a character string to be used as the name of the library 
  783.     (note: any other object than a string is converted to a string). 
  784.     The first few characters of the name are displayed in the LIBRARY menu 
  785.     label associated to the library, the first 22 characters are displayed 
  786.     by pressing REVIEW in the LIBRARY menu. If $TITLE is absent or contains 
  787.     an empty string, no title is generated and the resulting library don't 
  788.     have a menu label in the LIBRARY menu (note: you can switch to the 
  789.     libraries command menu by executing %LID MENU, even the library don't 
  790.     have a name or is not attached). 
  791.  
  792. $CONFIG 
  793.     Must contain a program to be executed at configuration time. 
  794.     The configuration code can generally NOT be written in user-RPL, but 
  795.     simple programs such as \<< 123 ATTACH \>> are Ok - more complicated 
  796.     programs should take care to leave the stack unchanged, and be sure 
  797.     NOT TO ERROR ! An error in a configuration program will cause a warmstart; 
  798.     the configuration code is called again during the startup process, 
  799.     producing a new error etc. If you are accidentally trapped by this, you 
  800.     must clear your memory to remove the faulty library ! 
  801.  
  802. $MESSAGE 
  803.     Must contain a list of strings to be combined into a message table (note: 
  804.     any other objects than strings are converted to strings). The message 
  805.     numbers corresponds to the list positions. In user-RPL you can generate 
  806.     errors with own messages in the following manner: 
  807.             #32001h DOERR 
  808.              |||++-- Message number     (here 1) 
  809.              +++---- LID                (here #320h = 800) 
  810.     In sys-RPL you can use 
  811.             # 32001 ERROROUT 
  812.  
  813.     In this example an error is generated, using the first message from the 
  814.     message table of a library with the LID 800. 
  815.  
  816.     Note: The message list structure is NOT compatible to USRLIB.EXE. 
  817.  
  818. $VISIBLE 
  819.     Must contain a list of names of variables to be converted to user- 
  820.     accessible, named library commands. By default, all variables will be 
  821.     translated to named library commands. When the $VISIBLE list is present, 
  822.     only the names in this list are included in the library hash table. An 
  823.     empty list is Ok, meaning that no hash table is generated. 
  824.  
  825. $HIDDEN 
  826.     Must contain a list of names of variables that are to be converted to 
  827.     unnamed objects in the library. When the $HIDDEN list is present, those 
  828.     names listed are not entered in the library hash table. If both $VISIBLE 
  829.     and $HIDDEN are present, only $HIDDEN will be used. 
  830.  
  831.     Note: all visible commands appears as labeled softkeys in the menu 
  832.     associated to the library, all hidden command not and there is no way 
  833.     to access them from users scope. 
  834.  
  835. $VARS 
  836.     Must contains a list of variables that should remain RAM-based - ei. the 
  837.     objects of the variables listed in $VARS are not included in the library 
  838.     and no XLIB pointers are made to substitute their names. All other 
  839.     variables of the current directory are included in the library. 
  840.  
  841.     Note: You should add all subdirectory names of the current directory to 
  842.     the list. 
  843.  
  844. $ROMID must exist in the current directory, all other control variables are 
  845. optional - you can generate libraries containing only a configuration program 
  846. or a message table. All control variables are internally handled by D->LIB to 
  847. be $VARS and can't be accessed from within the library commands. 
  848.  
  849.  
  850. 3.4 Command Reference 
  851. --------------------- 
  852.  
  853. D->LIB          (                       --> lib                         ) 
  854.  
  855.     Dir to lib; assembles a library from the objects of the current directory. 
  856.     The creation process is controlled by a few variables with reserved names 
  857.     (see '3.3 Control Variables'). 
  858.     If you set flag -13 before running D->LIB, it'll switch off the screen 
  859.     while working (for saving time and batteries). 
  860.  
  861.  
  862. L->DIR          ( %LID                  --> dir                         ) 
  863.                 ( xlib                  --> ob                          ) 
  864.  
  865.     Lib to dir; if the argument is a LID then L->DIR assembles a directory 
  866.     containing all commands of this library as variables. The neccessary 
  867.     control variables (see 3.3) are also generated. L->LIB may be used to 
  868.     recreate the library. 
  869.     If the argument is a XLIB, then L->DIR recalls its object from the 
  870.     associated library onto the stack. 
  871.     If you set flag -13 before running L->DIR on a library, it'll switch off 
  872.     the screen while working (for saving time and batteries). 
  873.  
  874.     Note: You cannot use L->DIR to split <-LIB->, this should prevent users 
  875.     from a memory lost. If you are conform with the internals of your HP48, 
  876.     use 'ROMPTR@' (or ->OB) to extract single routines from <-LIB->, but 
  877.     beware of starting the routines in RAM, most of them will crash your calc 
  878.     when running standalone ! 
  879.  
  880.  
  881. MCFG            (                       -->                             ) 
  882.  
  883.     Make config; stores a configuration program into a variable named 
  884.     '$CONFIG' into the current directory. This configuration program will 
  885.     attach the generated library to the home directory at warmstarts (ON-C 
  886.     etc.). 
  887.     '$ROMID' must exist in the current directory. 
  888.  
  889.  
  890. ML->D           (                       --> prg                         ) 
  891.  
  892.     Generates a program with the following interface: 
  893.  
  894.                 ( {}                    --> libdta                      ) 
  895.  
  896.     The list can contain anything. The program checks for argument count and 
  897.     type and may error with: 
  898.         #201 - To Few Arguments  - nothing on the stack 
  899.         #202 - Bad Argument Type - not a list on the stack 
  900.  
  901.     '$ROMID' must exist in the current directory. 
  902.  
  903.  
  904. MD->L           (                       --> prg                         ) 
  905.  
  906.     Generates a program with the following interface: 
  907.  
  908.                 ( libdta                --> {}                          ) 
  909.  
  910.     The program checks for argument count, type and correct LID and may error 
  911.     with: 
  912.         #201 - To Few Arguments   - nothing on the stack 
  913.         #202 - Bad Argument Type  - no library data on the stack 
  914.         #203 - Bad Argument Value - the libdta wasn't created by this lib 
  915.  
  916.     '$ROMID' must exist in the current directory. 
  917.  
  918.   Note: Store the programs generated by ML->D and MD->L into variables in 
  919.   your source directory and use them as an interface to generate/resolve 
  920.   data associated to the resulting library. 
  921.  
  922.  
  923. OB->            ( prg                   --> ob1 .. obn %n               ) 
  924.                 ( xlib                  --> %LID %objno                 ) 
  925.                 ( arry                  --> ob1 .. obn { %di .. %d1 }   ) 
  926.                 ( alg                   --> ob1 .. obn %n               ) 
  927.                 ( dir                   --> ob1 id .. obn id %n         ) 
  928.                 ( id                    --> $                           ) 
  929.                 ( libdta                --> {} %LID                     ) 
  930.                 ( bak                   --> ob id                       ) 
  931.                 ( id                    --> $                           ) 
  932.                 ( ob                    --> dispatch to OBJ->           ) 
  933.  
  934.     OB-> is an extension to the built-in OBJ->, supporting system level 
  935.     objects. 
  936.  
  937.  
  938. ->DIR           ( ob1 id1 .. obn idn %n --> dir                         ) 
  939. ->PRG           ( ob1 .. obn %n         --> prg                         ) 
  940. ->XLIB          ( %LID %cmdno           --> xlib                        ) 
  941.                 ( #LID #cmdno           --> xlib                        ) 
  942. ->ARR           ( ob1 .. obn %n         --> arry                        ) 
  943.                 ( ob1 .. obn { %di .. %d1 } --> arry                    ) 
  944. ->ALG           ( ob1 .. obn %n         --> prg                         ) 
  945. ->LD            ( {} %LID               --> libdta                      ) 
  946. ->BAK           ( ob id                 --> bak                         ) 
  947. ->ID            ( $                     --> id                          ) 
  948.  
  949.     Functions to reverse OB->. 
  950.  
  951.     About ->ARR: 
  952.        Generates arrays of any type and any dimension (eg. a four dimensional 
  953.        array of libraries :-). 
  954.        %di * .. * %d1 must be = n, ob1 .. obn must be of the same type. 
  955.        All possible parameter errors are trapped. 
  956.  
  957.  
  958. ADRp            ( ob                    --> ob #addr                    ) 
  959.  
  960.     Get address of ob. 
  961.  
  962.     Note: The data stack is a stack of pointer to objects. ADRp simply returns 
  963.     the value from the top element (about the 'p', see 'LIBp' below). 
  964.  
  965.  
  966. $romid 
  967. $visible 
  968. $title 
  969. $config 
  970. $vars 
  971. $hidden 
  972. $message        (                       --> '$XXX'                      ) 
  973.  
  974.     These commands just put a control variable name onto the stack. 
  975.  
  976.  
  977. LBCRC           ( lib                   --> lib'                        ) 
  978.                 ( bak                   --> bak'                        ) 
  979.  
  980.     Recalculates the CRC of a library or backup, usefull if you have patched 
  981.     it because modifying the body of a library or backup invalidates the CRC 
  982.     included at the end of the body. 
  983.  
  984.  
  985. RNLIB           ( lib $                 --> lib'                        ) 
  986.  
  987.     Renames a library, ie. changes title. 
  988.  
  989.  
  990. CHLID           ( lib %                 --> lib'                        ) 
  991.  
  992.     Change LID; this program allows you to change the LID of a library if 
  993.     it's not splittable. 
  994.  
  995.     Note: Most time a LID is also hardcoded in the config code - this can 
  996.     generally not be changed by CHLID. You have to attach the library manually 
  997.     after a warmstart. Also any library have its LID coded in a field above 
  998.     any visible command (the error handling system identifies the command 
  999.     that caused an error using this field (the sys-RPL commands 'CKn' copies 
  1000.     this values to the appropriate location)). These fields are not changed 
  1001.     by CHLID (yet). 
  1002.  
  1003.  
  1004. RHASH           ( %LID                  --> hxs                         ) 
  1005.  
  1006.     Recall hash table; get a pointer to the hash table of a library. 
  1007.  
  1008.  
  1009. RLINK           ( %LID                  --> hxs                         ) 
  1010.  
  1011.     Recall link table; get a pointer to the link table of a library. 
  1012.  
  1013.  
  1014. RCFG            ( %LID                  --> ob                          ) 
  1015.  
  1016.     Recall config code; get a pointer to the config code of a library. 
  1017.  
  1018.  
  1019. RMSG            ( %LID                  --> arry                        ) 
  1020.  
  1021.     Recall message table; get a pointer to the message table of a library. 
  1022.  
  1023. RTITLE          ( %LID                  --> $                           ) 
  1024.  
  1025.     Recall title; get the name of a library. 
  1026.  
  1027.  
  1028.     Note: RHASH, RLINK, RCFG, RMSG and RTITLE don't error if the library 
  1029.     associated to %LID didn't contain the requested item, they leave the 
  1030.     stack unchanged in that case. 
  1031.  
  1032.  
  1033. RPORT           ( %port                 --> ob1 .. obn                  ) 
  1034.  
  1035.     Recalls pointers to all objects of a given port (0/1/2) onto the stack, 
  1036.     ignoring the R/W status of that port. 
  1037.  
  1038.  
  1039. RLIB            ( :%port:%LID           --> lib                         ) 
  1040.                 ( %LID                  --> libn %portn ...             ) 
  1041.  
  1042.     Recall lib; the 1st case recalls a library from a given port, the 2nd 
  1043.     case searches ports 0,1,2 for libraries with %LID, returning all found 
  1044.     libraries and the port numbers where they're stored. 
  1045.  
  1046.     Note: This command actually returns pointer to libraries (like RPORT), 
  1047.     if you recall a lib and try to purge it while it's on the stack, you'll 
  1048.     get a 'Object in use' error. Execute NEWOB or store it into a variable 
  1049.     first. 
  1050.  
  1051.  
  1052. PGLIB           ( :%port:%LID           -->                             ) 
  1053.                 ( %LID                  -->                             ) 
  1054.  
  1055.     Purge lib; the 1st case works like :%port:%LID PURGE, in the 2nd case the 
  1056.     ports are searched in order 0,1,2 for an active library with %LID. The 
  1057.     difference to PURGE: if the library is attached to the home directory, 
  1058.     it's detached before purging. Also if there is an inactive library with 
  1059.     the same LID in any other port, it becomes active and is attached to the 
  1060.     HOME directory (if flag 5 is set, its config code is executed - see STLIB 
  1061.     below). 
  1062.  
  1063.  
  1064. STLIB           ( lib %port             -->                             ) 
  1065.  
  1066.     Store lib into port; there're a few differences to STO: 
  1067.         - The library is installed full; a warmstart isn't neccessary 
  1068.           and thus not initiated at the next power cycle. All warmstart 
  1069.           volatile variables (stack, PICT) remains intact. 
  1070.         - The library last stored is visible to the HP48 (in case of 
  1071.           having a library with the same LID installed in another port). 
  1072.         - If flag 5 is clear, the library is attached simply to the 
  1073.           home directory. 
  1074.         - If flag 5 is set, the config code of the library is executed 
  1075.           under warmstart conditions. Usefull for testing a config code. 
  1076.  
  1077.  
  1078. ACLIB           ( :%port:%LID           -->                             ) 
  1079.  
  1080.     Activate library. You can install libraries with the same LID in different 
  1081.     ports, but only one will be visible to the HP48 at the time. During 
  1082.     warmstarts the ports are searched in order 2,1,0 (most cases), ie. the 
  1083.     library stored in the port with the highest number will be active. 
  1084.     ACLIB allows you to switch to any other library with the same LID at 
  1085.     runtime, the effect is immidiate. ACLIB 1st detaches the LID from HOME, 
  1086.     sets the new priority and than a) attaches the LID to HOME again if flag 
  1087.     5 is clear, or b) runs the library config code if flag 5 is set (see STLIB 
  1088.     above). 
  1089.  
  1090.  
  1091. LIBp            ( %LID                  --> $                           ) 
  1092.  
  1093.     Returns a detailed layout of a library. The map starts with the title (if 
  1094.     exist), followed by the 1st and last address of the lib and the LID. The 
  1095.     remainder lists the contens of the lib, one line of information for each 
  1096.     XLIB entry. Structure of a line: 
  1097.  
  1098.         1st last  xn name  typ 
  1099.         ||| ||||  || ||||  +++- Type of the object 
  1100.         ||| ||||  || ++++------ Name of the object (if it's a visible cmd) 
  1101.         ||| ||||  ++----------- XLIB number of the object 
  1102.         ||| ++++--------------- Last relative address of the object 
  1103.         +++-------------------- Offset to startaddr. of the object 
  1104.  
  1105.     The list is sorted by offset. Try 1221 LIBp or 2 LIBp. 
  1106.  
  1107.     Note: If you find unexpected 'holes' between two XLIBs (> 10 nibbs) or 
  1108.     XLIBs embedded in other XLIBS, the library wasn't generated using 
  1109.     USRLIB.EXE or D->LIB; do not use D->LIB for recreating it because the 
  1110.     'holes' can hold essential data.. 
  1111.  
  1112.  
  1113. INSTp           (                       --> { %LIDn .. %LID1 }          ) 
  1114.  
  1115.     Returns a list of all libraries attached to the current directory, { } if 
  1116.     none. 
  1117.  
  1118.     Note: You can PURGE libraries even if they are attached to a subdirectory. 
  1119.     INSTp can be used to find such zombies references. 
  1120.  
  1121.  
  1122. LIBSp           (                       --> { %LID1 .. %LIDn }          ) 
  1123.  
  1124.     Returns a list of all libraries currently installed on your HP48. 
  1125.  
  1126.  
  1127.   Note: We didn't use the '?' postfix because normally it marks a routine 
  1128.   for returning a flag in RPL. The JARGON file, v2.9.9, 01 APR 1992 states: 
  1129.  
  1130.     3. The `-P' convention: ------------------------ Turning a word into 
  1131.     a question by appending the syllable `P'; from the LISP convention of 
  1132.     appending the letter `P' to denote a predicate (a boolean-valued 
  1133.     function).  The question should expect a yes/no answer, though it 
  1134.     needn't.  (See {T} and {NIL}.) 
  1135.  
  1136.     At dinnertime: 
  1137.        Q: "Foodp?" 
  1138.        A: "Yeah, I'm pretty hungry." or "T!" 
  1139.  
  1140.     At any time: 
  1141.        Q: "State-of-the-world-P?" 
  1142.        A: (Straight) "I'm about to go home." 
  1143.        A: (Humorous) "Yes, the world has a state." 
  1144.  
  1145.   so we used 'p' for marking routines returning information ;-) 
  1146.  
  1147.  
  1148. fEVAL           ( ob                    --> ?                           ) 
  1149.  
  1150.     Works like EVAL, but switches the display off 1st. Speeds up evaluation 
  1151.     for ~11%. In case of an error or the ob have fineshed execution, the 
  1152.     display is switched on again. Not very usefull, if ob prompts for input.. 
  1153.  
  1154.  
  1155. 3.5 Things to Notice 
  1156. -------------------- 
  1157.  
  1158. +---------------------------------------------------+ 
  1159. | HP 48 Resource Allocation Guideline: Library ID's | 
  1160. +---------------------------------------------------+ 
  1161. | 0000 - 0256  Take-over libraries; do not use!     | 
  1162. | 0257 - 0512  HP ROM-based libraries; do not use!  | 
  1163. | 0513 - 0768  HP RAM-based libraries; do not use!  | 
  1164. | 0769 - 1791  3rd Party (assigned by HP)           | 
  1165. | 1792 - 2047  Command-line; do not use!            | 
  1166. +---------------------------------------------------+ 
  1167.  
  1168. *Don't use the following LIDs*, they're handled special by the HP48: 
  1169.  
  1170. LID             What's special ? 
  1171. ---             ---------------- 
  1172. 240-255         ROMPTR@ assumes that the associated library command is in the 
  1173.                 hidden ROM. 
  1174. 0-256,1792      The central routine to compile IDs (PTR 7BFD) returns pointer 
  1175.                 instead of XLIBs. 
  1176.  
  1177. The library stucture is 'flat', so don't try to include subdirectories in a 
  1178. library, it can end up in a memory lost. 
  1179.  
  1180. Not all program objects that execute correctly from global variables are 
  1181. directly convertible into libraries. Here are some pitfalls: 
  1182.  
  1183.     - Since a library cannot be modified, no library command may be the 
  1184.       target of a STO or PUT operation. 
  1185.     - XLIB names are not usable in all contexts in which global names are 
  1186.       valid arguments. This can cause constructs that reference a named 
  1187.       object to fail. For example, 
  1188.         'A' 5 GETI 
  1189.       where A is a list will not work when A is converted to an XLIB name. 
  1190.       Instead use 
  1191.             A 5 GETI 
  1192.     - XLIB names are not valid as formal variables in algebraics, or as the 
  1193.       independent variable for plotting or solving. 
  1194.     - \->STR applied to a global name that is converted to a 'hidden' library 
  1195.       command (see $HIDDEN) returns a null string. 
  1196.  
  1197. If any visible command starts with the seqence '\<< \->' or '\->' it's marked 
  1198. in the library as a valid command for algebraics. If you press its associated 
  1199. softkey in ALG entry mode, you'll get 'name()'. 
  1200.  
  1201. Multiple occurences of variable names results in an incorrect library because 
  1202. only the contens of the 1st one is picked up. 
  1203.  
  1204. D->LIB needs ~(1.2 * size_of_source_directory) bytes to be free to generate a 
  1205. library. 
  1206.  
  1207. The time D->LIB needs for doing a job depends mainly on the total number of 
  1208. commands included in the resulting library. Eg. Raymond runs D->LIB on a ~60kb 
  1209. directory containing ~300 variables; D->LIB needs ~45min on a rev A HP48 to 
  1210. make the library (not in FAST-mode). 
  1211.  
  1212. Reassembling a splitted library may be dangerous if the original library was 
  1213. not generated using USRLIB.EXE or D->LIB. There is no guarantee that the 
  1214. result will work probably - even if no code changes are done. 
  1215.  
  1216. USRLIB.EXE generates a link table entry for the configuration program; if you 
  1217. split such a library with L->DIR, you'll get the configuration code twice, the 
  1218. 1st one stored in $CONFIG, the 2nd one stored in a variable of the generated 
  1219. directory. Purge the variable before using D->LIB. You also can use LIBp to 
  1220. see the second reference to the config code. 
  1221.  
  1222.  
  1223. Appendix A - Quick Reference Guides 
  1224. =================================== 
  1225.  
  1226.  
  1227. A.1 <-RPL-> 
  1228. ----------- 
  1229.  
  1230.  
  1231. A.1.1 Commands 
  1232. -------------- 
  1233.  
  1234. Page 1234.1 
  1235.  
  1236.     RPL->       ( ob            --> $           )       decompile object 
  1237.     ->RPL       ( $             --> ob          )       compile object 
  1238.     DCADR       ( hxs           --> $ hxs'      )       decompile one word 
  1239.     COD->       ( code          --> $           )       disassemble CODE 
  1240.     ->COD       ( $             --> code libdat )       assemble CODE 
  1241.     ->OB        ( ob            --> ob'         ) 
  1242.  
  1243. Page 1234.2 
  1244.  
  1245.     DAN         ( hxs %n        --> $1 .. $n hxs' )     disassemble n times 
  1246.     DA1         ( hxs           --> $ hxs'      )       disassemble one mnemo 
  1247.     DAXY        ( hxs hxs       --> $           )       disassemble block 
  1248.     SYM->       ( libdat        --> $           )       convert symbol table 
  1249.     $->         ( $             --> ob          )       hex-dump to object 
  1250.     ->$         ( ob            --> $           )       object to hex-dump 
  1251.  
  1252. Page 1234.3 
  1253.  
  1254.     EC          (               --> ?           )       entries catalog 
  1255.     E<->A       ( hxs | $name   --> $name | hxs )       get name/address 
  1256.     RPLtab      (               --> $           )       recall ref. table 
  1257.     4/5/7       (               -->             )       sys-stack display 
  1258.     CC          (               --> ?           )       character set catalog 
  1259.  
  1260.  
  1261. A.1.2 Flag Usage 
  1262. ---------------- 
  1263.  
  1264. General: 
  1265.  
  1266.     Flag        Meaning 
  1267.     ----        ------- 
  1268.      -4         If set, RPL->/DCADR are using the disassembler to decompile 
  1269.                 code objects. Unresolved entries are generated as 'ASSEMBLE 
  1270.                 \n\tCON(5)\t#xxxxx\nRPL' instead of 'PTR xxxxx'. 
  1271.     -13         Quiet mode if set. The status report of RPL->, ->RPL, COD-> 
  1272.                 and ->COD is suppressed. 
  1273.     -27         Set by 4/5/7 to signal an active medium font display. Can 
  1274.                 be cleared to quit the sys-stack. 
  1275.     -28         Toggles sys-stack between 5/7 lines mode. 
  1276.     -29         Toggles the behaivior of the down arrow key during sys-stack 
  1277.                 display and the EDIT menu key during the sys-i-stack. If set, 
  1278.                 you can edit objects in sys-RPL syntax. A menu toggle for this 
  1279.                 flag can be found on the 3rd page of the i-stack menu (labeled 
  1280.                 SYS). 
  1281.  
  1282. DAN and DA1 are using the following flags: 
  1283.  
  1284.     Flag (set)  Meaning 
  1285.     ----------  ------- 
  1286.       1         next instr is a GO/RET YES/NO 
  1287.       2         last instr was RET... 
  1288.       3         last instr was GO C/NC/TO 
  1289.       4         last instr was relative GOSUB 
  1290.       5         last instr was absolute GO 
  1291.       6         last instr was PC manipulation 
  1292.       7         used internaly 
  1293.       8         last instr was absolute GO or Dx=(5) 
  1294.  
  1295.  
  1296. A.1.3 Error Messages 
  1297. -------------------- 
  1298.  
  1299. General Errormessages: 
  1300.  
  1301.     "Missing Library" 
  1302.         Requests to execute a command when the <-RPL-> library is not attached 
  1303.         to the HOME directory will cause this error. 
  1304.  
  1305.     "Need Binary Number" 
  1306.         The object passed to DCADR or DA1 isn't a binary number. 
  1307.  
  1308.     "Need String" 
  1309.         The object passed to ->RPL, ->COD or $-> isn't a string. 
  1310.  
  1311.     "Data Modifies Stack" 
  1312.         The object stored as RPL.TAB or ECpar doesn't add one item to the 
  1313.         stack. 
  1314.  
  1315.     "Where's your Program ?" 
  1316.         The string passed to ->RPL results to nothing. 
  1317.  
  1318.     "Primitive Code Object" 
  1319.         The object passed to RPL-> or the address passed to DCADR points to 
  1320.         a PCO. 
  1321.  
  1322. ->COD Errormessages: 
  1323.  
  1324.     ->COD generates error messages of the following form: 
  1325.         "->COD Error: Pos x:yy 
  1326.          Message" 
  1327.     where 'x' is the INCLUDE nesting depth and 'yy' is the character offset of 
  1328.     the first character following the token that caused the error. 'Message' 
  1329.     may be one of the following: 
  1330.  
  1331.     "ENDIF Expected"            an IF isn't matched by an ENDIF 
  1332.     "ENDIF w/o IF"              missplaced ENDIF 
  1333.     "ELSE w/o IF"               missplaced ELSE 
  1334.     "Invalid Parameter"         invalid parameter field 
  1335.     "Inv. Expr"                 invalid parameter field expression 
  1336.     "Invalid Mnemonic"          invalid menemonic 
  1337.     "Duplicate Label"           double defined label 
  1338.     "GOYES/RTNYES Expected"     comparisation without a following 
  1339.                                 conditional jump 
  1340.     "GOYES out of range"        jump destination is more than -128/+127 
  1341.                                 nibbles away 
  1342.     "Parameter Expected"        parameter of a mnemonic which expects 
  1343.                                 one is missing 
  1344.     "Unknown Symbol"            unknown symbol in an expression 
  1345.     "Invalid String"            invalid string constant 
  1346.     "No IF Nesting Yet"         nesting of conditional IF .. ELSE .. ENDIF 
  1347.                                 structures is not allowed (yet). 
  1348.  
  1349. ->RPL Errormessages: 
  1350.  
  1351.     ->RPL generates error messages of the following form: 
  1352.         "->RPL Error: Pos x:yy 
  1353.          Message" 
  1354.     where 'x' is the INCLUDE nesting depth and 'yy' is the character offset of 
  1355.     the first character following the token that caused the error. 'Message' 
  1356.     may be one of the following (additional to the ones listed for ->COD): 
  1357.  
  1358.     "; or } Expected" 
  1359.         Missing a ; to terminate a program, list, UNIT or SYMBOL 
  1360.  
  1361.     ") Expected" 
  1362.         Missing a ) to terminate a comment 
  1363.  
  1364.     "" Expected" 
  1365.         Missing a " to terminate a string 
  1366.  
  1367.     "Misplaced ; or }" 
  1368.         Found a ; or } without a opening ::, {, UNIT or SYMBOL 
  1369.  
  1370.     "Suspect %" 
  1371.     "Suspect %%" 
  1372.         Parsing of a number results in an object of incorrect type. 
  1373.  
  1374.     "Body Len <> Datalen" 
  1375.         The length field of a HXS-like styled statement is not equal to 
  1376.         the data length 
  1377.  
  1378.     "More Tokens Expected" 
  1379.         The statement at the end of the input string is incomplete 
  1380.  
  1381.     In the following messages 'ttt' represents the token that causes the 
  1382.     error: 
  1383.  
  1384.     "ROMP LibID >FFF: ttt" 
  1385.     "ROMP ROMWD >FFF: ttt" 
  1386.         The library ID part or the ROM word number part of a ROMPTR statement 
  1387.         is > FFF 
  1388.  
  1389.     "Suspect \ Seq: ttt" 
  1390.         The escape sequence ttt in the string, ID or LAM is incomplete or 
  1391.         invalid 
  1392.  
  1393.     "Can't INCLUDE: ttt" 
  1394.     "Can't INCLOB: ttt" 
  1395.         There's no variable with the name ttt 
  1396.  
  1397.     "Inv. xxx: ttt" 
  1398.         where 'xxx' is one of the following: 
  1399.  
  1400.         "Tok"   - ttt is unresolvable 
  1401.         "#"     - ttt is out of range or contains other chars than hex digits 
  1402.         "$"     - ttt doesn't start with a " 
  1403.         "%","%%"- ttt represents not a valid number 
  1404.         "PTR"   - ttt is out of range or contains other chars than hex digits 
  1405.         "CHR"   - ttt contains more than one char 
  1406.  
  1407.         "Body Dat" - the data field of a HXS-like styled statement contains 
  1408.                      other chars than hex digits 
  1409.         "Body len" - the length field of a HXS-like styled statement contains 
  1410.                      other chars than hex digits 
  1411.         "ROMP RW"  - the ROM word number field of a ROMPTR is longer than 5 
  1412.                      chars or contains other chars than hex digits 
  1413.         "ROMP LI"  - the library ID field of a ROMPTR is longer than 5 chars 
  1414.                      or contains other chars than hex digits 
  1415.  
  1416.  
  1417. A.2 <-LIB-> 
  1418. =========== 
  1419.  
  1420.  
  1421. A.2.1 Commands 
  1422. -------------- 
  1423.  
  1424. Page 1221.1 
  1425.  
  1426.     D->LIB      (               --> lib         )       build library 
  1427.     L->DIR      ( %             --> dir         )       split library 
  1428.     MCFG        (               -->             )       make config program 
  1429.     ML->D       (               --> prg         )       make libdat-> handler 
  1430.     MD->L       (               --> prg         )       make ->libdat handler 
  1431.     OB->        ( ob            --> ?           )       split object 
  1432.  
  1433. Page 1221.2 
  1434.  
  1435.     ->DIR       ( meta(ob,id)   --> dir         )       make directory 
  1436.     ->PRG       ( meta(ob)      --> prg         )       make program 
  1437.     ->XLIB      ( % % | # #     --> xlib        )       make XLIB 
  1438.     ->ARR       ( meta(ob)      --> arry        )       make array 
  1439.     ->ALG       ( meta(ob)      --> alg         )       make algebraics 
  1440.     ->LD        ( {} %          --> libdta      )       make library data 
  1441.  
  1442. Page 1221.3 
  1443.  
  1444.     ->BAK       ( ob $          --> bak         )       make backup 
  1445.     ->ID        ( $             --> id          )       make identifier 
  1446.     ADRp        ( ob            --> ob #        )       get address of object 
  1447.     $romid      (               --> id          )       get id '$ROMID' 
  1448.     $visible    (               --> id          )       get id '$VISIBLE' 
  1449.     $title      (               --> id          )       get id '$TITLE' 
  1450.  
  1451. Page 1221.4 
  1452.  
  1453.     $config     (               --> id          )       get id '$CONFIG' 
  1454.     $vars       (               --> id          )       get id '$VARS' 
  1455.     $hidden     (               --> id          )       get id '$HIDDEN' 
  1456.     $message    (               --> id          )       get id '$MESSAGE' 
  1457.     LBCRC       ( lib | bak     --> lib' | bak' )       recalculate CRC 
  1458.     RNLIB       ( lib $         --> lib'        )       rename library 
  1459.  
  1460. Page 1221.5 
  1461.  
  1462.     CHLID       ( lib %         --> lib'        )       change LID 
  1463.     RHASH       ( %             --> C#          )       get hash table 
  1464.     RLINK       ( %             --> C#          )       get link table 
  1465.     RCFG        ( %             --> prg         )       get config code 
  1466.     RMSG        ( %             --> arry        )       get message table 
  1467.     RTITLE      ( %             --> $           )       get title 
  1468.  
  1469. Page 1221.6 
  1470.  
  1471.     RPORT       ( %             --> ob ...      )       recall port 
  1472.     RLIB        ( %             --> lib % ...   )       recall library(s) 
  1473.     PGLIB       ( % | :%:%      -->             )       purge library 
  1474.     STLIB       ( lib %         -->             )       store library 
  1475.     ACLIB       ( :%:%          -->             )       activate library 
  1476.     LIBp        ( %             --> $           )       get library layout 
  1477.  
  1478. Page 1221.7 
  1479.  
  1480.     INSTp       (               --> {}          )       get installed LIDs 
  1481.     LIBSp       (               --> {}          )       get all LIDs on 48 
  1482.     fEVAL       ( ob            --> ?           )       fast EVAL 
  1483.  
  1484.  
  1485. A.2.2 Flag Usage 
  1486. ---------------- 
  1487.  
  1488. 5       Set:    STLIB executes config code of passed library after 
  1489.                 installation. 
  1490.                 ACLIB executes config code of activated library. 
  1491.                 <-LIB->s config code displays (c) notice. 
  1492.         Clear:  STLIB and ACLIB simply attaches handled library to 
  1493.                 the HOME directory. 
  1494.                 <-LIB->s config code don't display (c) notice. 
  1495.  
  1496. 6       Set:    L->DIR places the $control variables at the end of the 
  1497.                 generated directory. 
  1498.         Clear:  L->DIR places the $control variables at the beginning of 
  1499.                 the generated directory. 
  1500.  
  1501. 7       Set:    L->DIR generates a $HIDDEN but no $VISIBLE variable. 
  1502.         Clear:  L->DIR generates a $VISIBLE but no $HIDDEN variable. 
  1503.  
  1504. -13     Set:    D->LIB/L->DIR are switching the display off while processing 
  1505.                 a directory/library (fast mode). 
  1506.         Clear:  D->LIB/L->DIR are leaving the display on while working. 
  1507.  
  1508.  
  1509. A.2.3 Error Messages 
  1510. -------------------- 
  1511.  
  1512. "Missing $ROMID" 
  1513.     $ROMID is not defined in the current directory 
  1514.  
  1515. "$ROMID Not Real/Binary" 
  1516.     $ROMID doesn't contain a real or binary object 
  1517.  
  1518. "$ROMID Out of Range" 
  1519.     a) The value of $ROMID is > 2047 
  1520.     b) A real > 2047 was passed to CHLID 
  1521.  
  1522. "$CONFIG Not a Program" 
  1523.     Because the stack must not change during warmstarts, $CONFIG must contain 
  1524.     a program 
  1525.  
  1526.     Note: Use 1 ->PRG to embedd CODE, IDs or XLIBs into a program. 
  1527.  
  1528. "$HIDDEN Not a List" 
  1529. "$VISIBLE Not a List" 
  1530. "$VARS Not a List" 
  1531. "$MESSAGE Not a List" 
  1532.     $XXX must contain a list 
  1533.  
  1534. "Found ID Name>16 Chars" 
  1535.     D->LIB have found a visible command name which is > 16 chars in size 
  1536.  
  1537. "Found 0-ID" 
  1538.     D->LIB have found a visible command name with the size 0 
  1539.  
  1540.  
  1541. Appendix B - A ->COD Example 
  1542. ============================ 
  1543.  
  1544.  
  1545. Key in the following text (including the string delimiters) on your HP48 (you 
  1546. may leave out the comments): 
  1547.  
  1548. "       GOSBVL  =SAVPTR         ** Save RPL pointers in save locations 
  1549. **                                 P is 0 , HEX mode enabled 
  1550.         LAHEX   123AFE          ** Load HEX nibbles into A Register 
  1551. **                                 starting at P 
  1552.         P=      5               ** 
  1553.         GOVLNG  =PUSHhxsLoop    ** Push A[WP] onto Data stack 
  1554. **                                 and pass control to RPL 
  1555. " 
  1556.  
  1557. Store it in the variable SRC1. Recall the text to the stack, then press 
  1558. [->COD]. The display will show 'ASSEMBLER PASS 1' on the bottom line. 
  1559. In the upper part of the display 'Line  nnn' will appear, where <nnn> 
  1560. represents the actual code line to be assembled (empty lines or comment 
  1561. lines are not counted). 
  1562.  
  1563. A second later the display will show 'ASSEMBLER PASS 2' on the bottom line and 
  1564. 'Processing nnn Lines' in the message area. Another second later the source 
  1565. will have been assembled and the the string will be replaced by a 'Code' 
  1566. object and a 'Library Data' object. The stack should look as follows: 
  1567.  
  1568. +---------------------+ 
  1569. |                     | 
  1570. +---------------------+ 
  1571. |4:                   | 
  1572. |3:                   | 
  1573. |2:               Code| 
  1574. |1:       Library Data| 
  1575. ### ### ### ### ### ### 
  1576. +---------------------+ 
  1577.  
  1578.  
  1579. The Library Data object contains all used local symbols (eg. labels). For the 
  1580. above example, it is an empty string as there are no local symbols. The Code 
  1581. object represents the assembled source text. DROP the Library Data object and 
  1582. store the Code object into 'XQ1', then press the menu key [XQ1] . The stack 
  1583. now looks like: 
  1584.  
  1585. +---------------------+ 
  1586. |                     | 
  1587. +---------------------+ 
  1588. |4:                   | 
  1589. |3:                   | 
  1590. |2:                   | 
  1591. |1:          # 123AFEh| 
  1592. ### ### ### ### ### ### 
  1593. +---------------------+ 
  1594.  
  1595.  
  1596. Now lets change example 1 to make use of the symbolic facilities of SASM48. 
  1597. First recall [SRC1] and edit the string: 
  1598.  
  1599. " 
  1600. hexdig  EQU     #123AFE 
  1601. pHXS    EQU     5 
  1602.         GOSBVL  =SAVPTR         ** Save RPL pointers in save locations 
  1603. **                                 P is 0 , HEX mode enabled 
  1604.         LA(6)   hexdig          ** Load 6 HEX nibbles (represented by hexdig) 
  1605. **                                 into A Register , starting at P 
  1606.         P=      pHXS            ** Set P to the value specified by pHXS 
  1607.         GOVLNG  =PUSHhxsLoop    ** Push A[WP] onto Data stack 
  1608. **                                 and pass control to RPL 
  1609. " 
  1610.  
  1611. Store the string in SRC2, recall it back to the stack, then press [->COD]. The 
  1612. result looks like the result of example 1 except that the Library Data now 
  1613. contains the values of the defined labels. When the stack shows: 
  1614.  
  1615. +---------------------+ 
  1616. |                     | 
  1617. +---------------------+ 
  1618. |4:                   | 
  1619. |3:                   | 
  1620. |2:               Code| 
  1621. |1:       Library Data| 
  1622. ### ### ### ### ### ### 
  1623. +---------------------+ 
  1624.  
  1625. press [SYM->] (located on the second menu page). The display changes to: 
  1626.  
  1627. +---------------------+ 
  1628. |                     | 
  1629. +---------------------+ 
  1630. |4:                   | 
  1631. |3:                   | 
  1632. |2:               Code| 
  1633. |1: "hexdig  EQU   #..| 
  1634. ### ### ### ### ### ### 
  1635. +---------------------+ 
  1636.  
  1637.  
  1638. Press the down-arrow key: 
  1639.  
  1640. +---------------------+ 
  1641. |                  prg| 
  1642. +---------------------+ 
  1643. |                     | 
  1644. |                     | 
  1645. |"hexdig  EQU   #123..| 
  1646. |pHXS    EQU   #5     | 
  1647. ### ### ### ### ### ### 
  1648. +---------------------+ 
  1649.  
  1650. This is the symbol table for SRC2. Press ATTN to return to the stack. DROP the 
  1651. string in level 1 and store the Code object into 'XQ2'. Press [XQ2]. You will 
  1652. get the same result as in example 1 because it's the same machine language 
  1653. program. 
  1654.  
  1655. You could even use [COD->] to disassemble the Code object in level 1. 
  1656.  
  1657.  
  1658. Appendix C - Ordering Information 
  1659. ================================= 
  1660.  
  1661.  
  1662. The sources of the <-RPL-> and the <-LIB-> libraries consists of more than 
  1663. 15000 lines of RPL/assembler code (that's more than 250kb of text !) and we 
  1664. spend our free time of more than one year on writing RPL48, so we decided to 
  1665. release this version as GiftWare and probably the first non-beta version as 
  1666. ShareWare. 
  1667.  
  1668. Anyway, this release is a GiftWare release, ie. you can use RPL48 as long as 
  1669. you like but only for developing non-comercial software and as a private 
  1670. person. If you think RPL48 is usefull and the authors are worth to be rewarded 
  1671. for the time they have invested in developing this toolkit, feel free to send 
  1672. one of us (or both ;-) any sort of gift (even only a postcard will be wellcome). 
  1673. If your gift covers the expense sending you a disk via SnailMail (costs are: 
  1674. the disk, an envelope, the stamp and our time -> ~20$ or something equivalent), 
  1675. we will send you the latest version of RPL48 on a MesS-DOS formatted disk 
  1676. (including the <-RPL-> library branded with your name in the startup message). 
  1677. Don't forget to include your name, address and the disk size you prefer. 
  1678.  
  1679. Developing commercial software using RPL48 requires registration via the 
  1680. GiftWare concept; companies have to send us at least a 50$-worth gift for 
  1681. registration. 
  1682.  
  1683. Planned for the future are: 
  1684.     - ROM rev J support         (if there are problems) 
  1685.     - better ARRY support in <-RPL-> 
  1686.     - maybe a DIR support in <-RPL-> 
  1687.     - a system RPL debugger     (hairy) 
  1688.     - a MKROM command which will allow a library creation similar to 
  1689.       MAKEROM.EXE 
  1690.     - a string editor           (hairy) 
  1691.     - support of the new HP calc... 
  1692.  
  1693. (all without guaranteeing the implementation) 
  1694.  
  1695. Contact addresses: 
  1696.  
  1697.         Detlef Mueller                  Raymond Hellstern 
  1698.         Bellerbek 33                    Liebigstr. 8 
  1699.         W-2000 Hamburg 56               W-3000 Hannover 1 
  1700.         Germany                         Germany 
  1701.  
  1702.         Tel. +49 40 811 92 80           Tel./FAX +49 511 66 10 11 
  1703.  
  1704.         e-mail: detlef@dmhh.hanse.de 
  1705. -- 
  1706.